

 IS_NULL:
  PUSH(FP);
  MOV(FP, SP);

  MOV(R0,FPARG(2));
  CMP(IND(R0), IMM(T_NIL));
  JUMP_EQ(L_IS_NULL_T);
  MOV(R0, IMM(3));
  POP(FP);
  RETURN;
 L_IS_NULL_T:
  MOV(R0, IMM(5));
  POP(FP);
  RETURN;
